<ExtensionAttribute()>
Overloads Public Shared Sub Set( _
   ByVal ds As DicomDataSet, _
   ByVal addOptional As Boolean, _
   ByVal ParamArray instances() As Object _
) 

Dim ds As DicomDataSet
Dim addOptional As Boolean
Dim instances() As Object
 
DicomExtensions.Set(ds, addOptional, instances)

[ExtensionAttribute()]
public static void Set( 
   DicomDataSet ds,
   bool addOptional,
   params object[] instances
)

[ExtensionAttribute()]
public:
static void Set( 
   DicomDataSet^ ds,
   bool addOptional,
   ... array<Object^>^ instances
) 

Public Class PatientInfoTest
   Private _PatientName As PersonName

   <Element(DicomTag.PatientName, Optional := True), TypeConverter(GetType(PersonNameConverter))> _
   Public Property PatientName() As PersonName
      Get
         Return _PatientName
      End Get
      Set
         _PatientName = Value
      End Set
   End Property

   Private _PatientID As String
   <Element(DicomTag.PatientID, Optional := False)> _
   Public Property PatientID() As String
      Get
         Return _PatientID
      End Get
      Set
         _PatientID = Value
      End Set
   End Property
End Class

<Test> _
Public Sub OptionalTest()
   Dim info As PatientInfoTest = New PatientInfoTest()

   ' Initialize DICOM engine
   DicomEngine.Startup()

   Dim ds As DicomDataSet = New DicomDataSet()

   ' Initialize empty dataset
   ds.Initialize(DicomClassType.Undefined, DicomDataSetInitializeFlags.None)

   '
   ' Initialize Patient Information
   '
   info.PatientName = New PersonName("LAST^FIRST")
   info.PatientID = "123456"

   '
   ' Set the patient information
   '
   ds.Set(False,info)

   '
   ' Patient Name should't exist since we didn't add optional elements
   '
   Dim element As DicomElement = ds.FindFirstElement(Nothing, DicomTag.PatientName, False)

   If element Is Nothing Then
      Console.WriteLine("Patient Name not added")
   End If
   DicomEngine.Shutdown()
End Sub

public class PatientInfoTest
{
    private PersonName _PatientName;

    [Element(DicomTag.PatientName, Optional = true)]
    [TypeConverter(typeof(PersonNameConverter))]
    public PersonName PatientName
    {
        get { return _PatientName; }
        set { _PatientName = value; }
    }

    private string _PatientID;
    [Element(DicomTag.PatientID, Optional = false)]
    public string PatientID
    {
        get { return _PatientID; }
        set { _PatientID = value; }
    }
}        


public void OptionalTest()
{            
    PatientInfoTest info = new PatientInfoTest();

    // Initialize DICOM engine
    DicomEngine.Startup();

    DicomDataSet ds = new DicomDataSet();

    // Initialize empty dataset
    ds.Initialize(DicomClassType.Undefined, DicomDataSetInitializeFlags.None);            

    //
    // Initialize Patient Information
    //
    info.PatientName = new PersonName("LAST^FIRST");
    info.PatientID = "123456";

    //
    // Set the patient information
    //
    ds.Set(false,info);

    //
    // Patient Name should't exist since we didn't add optional elements
    //
    DicomElement element = ds.FindFirstElement(null, DicomTag.PatientName, false);

    if (element == null)
        Console.WriteLine("Patient Name not added");
    DicomEngine.Shutdown();
}